myvar_0 = GetPrimitiveParameter(0)
myvar_1 = GetPrimitiveParameter(1)
myvar_2 = nInventory["GetShoppingTokens"](myvar_0)
local myvar_3 = 0
local myvar_4 = 0
local myvar_5 = 0
	if (myvar_1 == 1) then
		if (GetNeighborPersonData(myvar_0, PersonData["family number"]) < GetConstant(314, 4)) then
		myvar_3 = nInventory["CanAffordShoppingInventory"](myvar_0, myvar_2)
			if (0 < myvar_3) then
			myvar_4 = myvar_3 / 10000
			local myvar_10 = 10000
			math["mod"](myvar_3, myvar_10)
			myvar_5 = math["round"]()
		end
	end
end
myvar_6 = nInventory["GetShoppingTokens"](myvar_0)
myvar_7,myvar_8 = nInventory["GetShoppingAmount"](myvar_6)
myvar_10 = myvar_6
myvar_9,myvar_10 = nInventory["GetWholesaleAmount"](myvar_10)
	if (myvar_1 == 1) then
	nInventory["AddTokensAsPurchase"](myvar_0, myvar_6)
end
myvar_11 = math["floor"](myvar_7)
myvar_11 = myvar_11 * 10000
myvar_11 = myvar_11 + myvar_8
{R13},{R14},myvar_15,myvar_16 = pairs(gShopsFullSaleAmount)
for myvar_15, myvar_16 in pairs(gShopsFullSaleAmount) do 
	if (myvar_16 <= myvar_11) then
		if (myvar_11 < gShopsFullSaleAmount[(myvar_15 + 1)]) then
	else
		end
	end
end
myvar_15 = myvar_7
SetTemp(0, myvar_15)
myvar_15 = myvar_8
SetTemp(1, myvar_15)
myvar_15 = myvar_9
SetTemp(2, myvar_15)
myvar_15 = myvar_10
SetTemp(3, myvar_15)
myvar_15 = gShopsShoppingFulfilled[myvar_15]
SetTemp(4, myvar_15)
myvar_15 = myvar_4
SetTemp(5, myvar_15)
local myvar_14 = 6
myvar_15 = myvar_5
SetTemp(myvar_14, myvar_15)
